home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / HYP / C-D / CoolMacStacks.sea / Cool Mac Stacks / Utilities / Say The Numbers / stack_-1.xml < prev    next >
Extensible Markup Language  |  1991-12-17  |  1KB  |  20 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
  3. <stack>
  4.     <name>in</name>
  5.     <id>-1</id>
  6.     <cardCount>1</cardCount>
  7.     <cardID>3051</cardID>
  8.     <listID>2258</listID>
  9.     <cantModify><false /></cantModify>
  10.     <cantDelete><false /></cantDelete>
  11.     <cantAbort><false /></cantAbort>
  12.     <cardSize>
  13.         <width>384</width>
  14.         <height>74</height>
  15.     </cardSize>
  16.     <script>on sayTheNumbers container,beepforNonNumbersset cursor to watchput 14 into lagput "zero,one,two,three,four,five,six,seven,eight,nine" into theSoundsrepeat with i = 1 to the number of characters in containerif character i of container is not in ("1234567890") thenif beepForNonNumbers is not emptythenif character i of container is not in "-() " thenbeepend ifwait lagnext repeatelsewait lagnext repeatend ifend ifplay item (character i of container) +1 of theSoundswait until the sound is doneend repeatend sayTheNumbers</script>
  17.     <background id="2599" file="background_2599.xml" name="" />
  18.     <card id="3051" file="card_3051.xml" marked="false" name="" owner="2599" />
  19. </stack>
  20.